From 83e98b930ef0fe8aa8aa851ffbb654b610a09f20 Mon Sep 17 00:00:00 2001 From: "Aaron S. Hawley" Date: Fri, 25 May 2012 19:40:47 -0700 Subject: [PATCH] * lisp/thingatpt.el (forward-same-syntax): Handle no ARG case. --- lisp/ChangeLog | 4 ++++ lisp/thingatpt.el | 1 + 2 files changed, 5 insertions(+) diff --git a/lisp/ChangeLog b/lisp/ChangeLog index d091ac7ce85..6908f166871 100644 --- a/lisp/ChangeLog +++ b/lisp/ChangeLog @@ -1,3 +1,7 @@ +2012-05-26 Aaron S. Hawley + + * thingatpt.el (forward-same-syntax): Handle no ARG case. (Bug#11560) + 2012-05-26 Glenn Morris * progmodes/cc-mode.el (auto-mode-alist): Fix typo. diff --git a/lisp/thingatpt.el b/lisp/thingatpt.el index 1600785c117..57bbdf9d94a 100644 --- a/lisp/thingatpt.el +++ b/lisp/thingatpt.el @@ -457,6 +457,7 @@ backwards ARG times if negative." With prefix argument ARG, do it ARG times if positive, or move backwards ARG times if negative." (interactive "p") + (or arg (setq arg 1)) (while (< arg 0) (skip-syntax-backward (char-to-string (char-syntax (char-before)))) -- 2.30.2